David Kahn (Isleworth) sent an RPG/400 
version and admits to having had to convert an 
inferior RPG II program into Norwegian. Ever 
get the feeling you’re in the wrong business? 
DG Knight (Glamorgan), Roy Joslin (University 
of Portsmouth) and David Ayre (Hemel Hemp- 
stead) used Ada. Nick Thompson (Worthing) 
and John Edmundson (Bicknacre) used Fortran. 
David Oliveira (Harston) used the string-han- 
dling language Snobol — honest, there is a 
lanaguage called Snobol! Simon Evans (West 
Bergholt) used CList, which is a langauge I’ve 
never heard of but seems to run on IBM main- 
frames. 

There were, understandably, a number of 
applications macro language versions sent in. 
Bob Hussey (France) sent a Microsoft Word 
macro which, apart from the document interac- 
tion, could have been included in the Basic 
group. Richard Grant (Gosforth) used the macro 
language of WordWise, a BBC Micro program, 
and even enclosed an advertising flyer for the 
product in case I had any antediluvian hardware 
in search of an application. Christopher Randles 
(Flint Mountain) used 1-2-3’s macro language, 
and RD Geere (Andover) and Fred Harte (Co 
Cavan) demonstrated that it was possible using a 
1-2-3 spreadsheet — ie without writing a macro at 
all! Chris Bishop (Surrey) used Excel’s macro 
language, which is much more like Basic. 


Judgement day 

When we come to the familiar everyday lan- 
guages, there were so many entries that there 
just isn’t space to comment on each one that 
deserves it. Still, it wouldn’t be fair to wield the 
guillotine and cut people out just because of a 
shortage of space; hence the Roll of Honour (see 
panel on previous page). Everyone listed there 
sent in a well structured solution to the problem 
which was good enough to be used commercial- 
ly; indeed, some of them were in commercial use. 
Sorry not to be able to add the usual comments. 
Maybe nexttime I'll have to seta slightly tougher 
problem. How about a confirmation of quantum 
chromodynamics without using valence approx- 
imation? The need for a couple of years on a 
supercomputer should nicely limit the number of 
entries... 

Before we come to the winners, spare a 
though for Capt David Theobald, who made me 
think for the first time about the difficulties of 
programming in rough weather at sea — perhaps 
there’s a future article there! The tossing about 
doesn’t seem to have upset his program’s struc- 
ture in the least. And I hope Glyn Davies 
(Wrexham) passed Computing Paper 1—judging 
by the quality of the entry, there’s no doubt that 
he should have. 

HowcanI choose a single winner using ratio- 
nal methods from a set of programs that are all 
excellent? Finally I took the coward’s way out and 
used a pin — well, a random number generator — 
to select a name from the entire set mentioned 
here, Roll of Honour plus minority language 
entries. And the winner of the small token of our 
esteem, Computer Associates’ Realizer 2.0 
(which, hard as it is to believe, was only just 
released at the time the Challenge was set!), is 
Tony Stevens of Watford. 


It’s gratifying to see so much time and effort 
being invested in the entries, but please every- 
one, let’s try and keep the country’s computer 
operations running too. The Challenge isn’t that 
important! 


In theory 


True stories 


A few months ago I made the 
acquaintance of True Basic while 
writing the Computer Creators arti- 
cle on Kemeny and Kurtz, the origi- 
nal inventors of Basic. You may already know 
that I’m a Basic enthusiast, even though I try not 
to let it show too much. Recently my enthusiasm 
has been for the visual forms of the language: 
Visual Basic in particular, but I also think the 
MSDos implementation is pretty good. How- 
ever, my curiosity was aroused by the idea of 
True Basic. What's it like, and does it have any- 
thing to offer? 

The most important thing to say about True 
Basic is that it’s been constructed to satisfy a 
philosophical leaning towards what’s good for 
the student. Whether or not you like the varia- 
tions on the language that True Basic introduces 
will depend very much on how much you agree 
with the philosophy. For example, True Basic 
still uses the let, and although you can opt to omit 
it, the manual urges you not to. Why? Well, 
it spoils the simplicity of the language not to 
start every line with a keyword. If this sounds 
silly to you, you’ve been programming for too 
long! 

Beginners often do have trouble with assign- 
ment statements because there doesn’t seem to 
beacommand associated with them. Italso helps 
to make the difference between a=b (a condi- 
tion) and let a=b (an assignment). Still, for all 
this philosophising, most Basic programmers 
have given up using let — and this must surely be 
for practical reasons. 

True Basic is available under MSDos, for the 
Mac and for Unix. In operation it behaves like an 
interpreter, but in fact the source code is com- 
piled to intermediate B code. This means you can 
only create a standalone program by incorporat- 
ing a run-time interpreter. However, True Basic 
is fast enough for real applications. 


Out of this world 

Ifyou’ve used other PC-oriented Basics — Quick- 
BASIC or Power Basic, say — then the overall 
impression you'll get of True Basic is ofa strange 
and unworldly sort of approach. For example, the 
interface is familiar in that it uses drop-down 
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i : m+) ‘The True Basic editor (left) 

: i= may not have a state-of-the- 
art user interface, but at 
least you're not snowed 
under with icons 


Here’s the result (below) of 
the Hilbert curve program 
shown. OK, it’s irrelevant, 
but it looks pretty 


menus and dialog boxes, but it isn’t CUA (com- 
mon user access) compliant. I suppose you could 
ask why it should be, since this is a language that 
runs on machines other than the PC. Indeed, you 
can obviously point to its machine-independence 
as something of an advantage. 

The language itself is fully structured, with 
block ifs and the do..loop, which is one of Basic’s 
strongest control structures. There are lots of 
divergences from the more common Microsoft 
form ofthe language, and in nearly all cases these 
turn out to be distinct improvements. For exam- 
ple, strings are manipulated using an index nota- 
tion rather than functions; the file handling is 
more logical than MSDos’; the graphics com- 
mands are different and rather more powerful - 
and so on. 


Theory and practice 

Though most of the changes are motivated by 
philosophy rather than pragmatism, True Basic 
does have some remarkably practical features. 
For example, why is it that MSDos doesn’t have 
mouse handling functions but True Basic does? 
And why does True Basic have better error-han- 
dling features? 

True Basic has a distinct bias towards math- 
ematical facilities. It includes the matrix opera- 
tions that were part of the original Basic but 
dropped from most microcomputer Basics. And 
what other language can you name that has a 
function (called eps) which returns the smallest 
number that will make a difference when added 
to another number? If you can’t see why this 
might be useful, a clue is that eps stands for 
‘epsilon’. 

There are also lots and lots of useful libraries, 
ranging from graphics of all types through 
searching and sorting to complex arithmetic. 
And there are tools to convert from other dialects 
of Basic and from Fortran. 

SocanIrecommend True Basic? [have to say 
I’m torn between two points of view. The firstis » 
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@ The quadtree structure 
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© How the quadtree works 


© Deriving a 
quadcode 


A=0 B=1 


C=2 D=3 


that True Basic is a better language to learn, and 
hence to teach, than the versions we’re accus- 
tomed to. The second is that, at the end of the 
day, students will have to adapt to the Microsoft 
dialect of Basic because at the moment it’s still 
the most-used version, as QBasic and as the two 
Visual Basics. And there’s no way True Basic can 
compete with Visual Basic at the moment. 

If you want to teach the nicest and most ele- 
gant of all the classical languages, I recommend 
True Basic—andit’llrun on even the simplest and 
cheapest PC. If you want to stay in touch with the 
real world, however, Visual Basic is where it’s all 
_ happening. This said, I would suggest that all 
computer science teachers and lecturers get 
hold of a copy of the True Basic Student Edition 
and decide for themselves. 

If you’re not contemplating teaching a lan- 
guage, Ican recommend True Basic to any math- 
ematically oriented non-Windows user — espe- 
cially if you’re a fugitive from HP Basic. 


Quadtree compression 
= Incase you thought I'd already man- 
aged to describe all the compres- 
sion methods known to program- 
2a) merkind, here’s another one. It’s 
very easy to understand and implement, and is 
designed specifically to compress image data. 
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The basic idea is that the image is first divided 
into four equal quadrants; each of the quadrants 
is then divided into four more quadrants, and so 
on until division is no longer possible. At this 
stage, each quadrantis a single pixel with a given 
‘black’ or ‘white’ value. You can represent this 
subdivision process as a tree where each node 
represents a quadrant and has four branches cor- 
responding to its further subdivision into four 
more smaller quadrants. As each node has four 
branches, this type of tree is called a ‘quadtree’, 
which is also the name used for the compression 
method. 

Ifyou start off with a 4x4 image, for example, 
the first level of the tree, ie node 1, has four 
branches corresponding to the division into four 
2x2 quarters (see Figure 1). The next level of 
division completes the quadtree, and the binary 
values corresponding to the pixels’ colour are 
recorded at the terminal nodes of the tree. 

The quadtree is a very pretty structure, but 
how does it compress the data? The answer is 
thatit doesn’t until you add the condition that any 
subtree which is all ofthe same colour can be rep- 
resented by a value at its first node. Sounds com- 
plicated? It’s not. Consider the pattern shown in 
Figure 2. You can see that because quadrants A 
and D are all black and B is all white, there’s no 
need to expand the quadtree any further. Only 
quadrant C needs another layer to record the bit 
pattern within it. 

In practice, the quadtree makes its storage 
saving by coding large areas of one colour as a 
single node. You can extend the principle to 
greyscale or colour images too, although here 
the savings on storage space are generally less 
because of the small random variations that 
occur in areas that are supposed to be more or 
less the same tone or colour. 


Natural selection 

Quadtrees have applications in reducing the 
storage needed for a wide range of 2D data, as 
well as being extendible to 3D and even higher 
dimensions. For example, any sparse 2D matrix 
can be represented as a quadtree. 

What's less obvious is that the quadtree rep- 
resentation allows some natural image opera- 
tions to be performed directly on the coded data. 
For example, if you want to rotate the image 
through 90 degrees, all you have to do is rotate 
the order of the nodes at each level. Changes of 
scale can be accomplished simply by chopping 
the tree at an appropriate level. As you go down 
the tree, you can consider the quadrants at each 
level as being the pixels in a scaled image. The 
problem of what colour to set a quadrant to if it 
has other levels below it can be solved in a num- 
ber of ways, but the most obvious is to use major- 
ity logic —thatis, a node is black if most of its sub- 
nodes are black. 

Most surprisingly, a quadtree representa- 
tion makes it very easy to find connected compo- 
nents of animage by performing a particular type 
of tree traversal. 

You can implement quadtrees using pointers 
to build the necessary data structure. However, 
you can alternatively opt to build a ‘pointerless’ 
structure, called a ‘quadcode’, which gives high 
compression ratios. The idea of this is that each 
quadrant is given a code — A=0, B=1, C=2 and 
D=3, for example — and this is then used to 
encode the tree by giving a sequence of numbers 
corresponding to the position of the particular 
quadrant. So in our example (see Figure 3), 02 
would be the quadrant obtained by starting from 
quadrant A, dividing it into four and selecting its 
quadrant C. 


Bring on the sub 
This coding can of course be extended to any 
number of subdivisions. The final value of the 
quadrant is given by simply appending a grey- 
level value to the end of the quadcode. As each 
digit in the quadcode only needs two bits, you 
can specify a single pixel in a large image array 
using a very short quadcode. For example, if the 
image is 1,024x1,024 you can specify a single 
pixel with a quadcode consisting of 10 two-bit 
numbers. 

Larger areas can be specified using fewer 
codes. Indeed, the larger the area the shorter 
the quadcode required. Because quadcodes 
allow you to start out with a large area and then 
refine down your selection, they’re particularly 
useful in representing geographical data. They 
also make it easy to work out when two given 
areas are both contained within a larger area - 
two counties within one country, two coun- 
tries within one continent and so on. 

I’m sure there 
are lots and lots of 
applications for 


quadtrees and quad- True Basic 
codes that haven’t Student Edition £11.90 
been thought ofyet, | (limited to saving programs up 
so now that you | to150lines) 
know about them | Standard version £75 

h Pro version £360 
you have your | Unix version £595 
chanceforfameand | Toolkits £29 to £59 
fortune... Hl Asher Research (0705) 412668 


